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TITLE 

TYPE 
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PRESET PARAMETERS 



DESCRIPTION 



EXAMPLE 



NOTES 



Constant Listing Auxiliary for Floating Decimal 

Input routine which modifies D.O*I» 

18 + Floating Decimal Routine 

Same as Floating Decimal 

S3 for location of floating decimal accumulator, 

Sk for location of first word of floating decimal 

routine « 

This routine requires for its use "both the Floating Decimal 

Routine and the Decimal Order Input. When a constant is 

wanted* as for example* "add .005 into the accumulator" 

the constant itself is used for the address of the 84 order. 

Routine XA 1 stores it in a list starting at location 16 

and furnishes the Qk order with the correct address. If 

the list already has this constant* the constant is not 

stored again hut the address of the order refers to the 

earlier constant. 

Constants are written in the proper form to he 
read by the floating decimal program, that is as a sign 
followed by the digits of the constant, and a second sign 
followed "by two digits for the exponent. When a constant 
is "heing listed, the function digits of the order which 
refers to it are followed "by N. In the above example 
we would writes 84n +5-02 
Multiply the numbers in 200-299 hy 3* 1^16. 







OK 100F 
05 200F 



87N + 31^16 + 01 
OS 200F 



02 L 

(a) Zero cannot he listed as a constant. 
(h) The list is started at 16* This may he changed hy 
adjusting the last order of the routine appropriately! 
it is now 00 l6F. 



- 2 - 



(c) Post Mortem CI may not be used with this routine. 

(d) This routine requires that a sufficient amount of the 
memory be cleared initially to provide room for the stored 
constants . 
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pa™ 1 




00 9^K 











L5 2L 
40 1012F 




_ Alter D.O.Io 




1 


50 3L 
26 999F 








2 


26 2L 
00 IF 




— New word for D.O.I. 




3 


00 F 
00 L 








k 


00 F 
26 L 
26 IN 











00 F 
00 F 




— Temporary Storage 




1 


00 F 
00 F 








2 


k2 IF 
L3 F 




Store address 




3 


32 5L 
22 IF 




N follows function digits 
Obey order 




. k 


L5 L 
hO ( )F 




— Store constant in list 




5 


27 1017F 
L5 IF 




— Save order 




6 


40 1L 

50 6l 




— , 




T 


26 S4 
88 F 




— Read in and. store constant 




8 


8S L 
8j 9L 








; 9 


L5 1L' 
40 IF 




". — Replace order 




10 


L5 1-7L 
te ^L 




■■ 


. 
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XA1 



11 
12 

13 
Ik 

15 
16 

17 



42 12L 
k2 13L 
42 IF 
L3 ( )F 
36 4L 
LI ( )F 
Lk L 
40 F 
L3 F 
36 4L 
F5 4L 
22 10L 
00 F 
00 l6F 



Preset list location* 



Test for zero 



Test for equality 



